;; Do not delete this line
[@main]
#ACT
goto @LottoSystem_ItemClick
goto @AreaQuest_7Item
goto @Luckystone_7Item
goto @ExpStone_Item
goto @ExplainStone_Item
goto @Goldbox_Item
goto @Silverbox_Item
goto @Famestone_Item
goto @Daohubook_Item
goto @Daohulifu_Item
break

[@LottoSystem_ItemClick]
#CALL [System\LottoSystem\LottoItemClick.txt] @LottoSystem_LottoItemClick

[@ExplainStone_Item]
#CALL [winma\Gonglue stone.Txt] @Gonglue Stone

[@ExpStone_Item]
#CALL [winma\experience in stone.Txt] @Experience Stone

[@Goldbox_Item]
#CALL [winma\adamantine chest.Txt] @Open adamantine chest

[@Silverbox_Item]
#CALL [winma\dense silver chest.Txt] @Open Secret silver chest

[@Famestone_Item]
#CALL [winma\standing stone.Txt] @prestige Stone

[@Daohubook_Item]
#CALL [winma\Road Fox books.Txt] @Road, Fox Books

[@Daohulifu_Item]
#CALL [winma\Road, currently the magic fox.Txt] @Road, currently the magic fox

[@_UserLogin]
#ACT
Delaygoto [Local] 2 @ _UserFBLogin
Delaygoto [Local] 3 @ BasicQuest_Control
Delaygoto [Local] 4 @ _TIMEREVENT
break

[@_TIMEEVENT]
#CALL [KINGSCRIPT\UserTimeEvent.txt] @UserTimeEvent1

[@_Diary]
#CALL [System\MirGuideBook.txt] @Mir3GuideBook

[@_UserFBLogin]
#CALL [Vimascript\repetition_login.txt] @repetition_login

[@_MagicGate]
#ACT
MapMove D900 20 22

[@_MagicGate_Dark]
#ACT
MapMove D2900 45 34

[@AreaQuest_7Item]
#CALL [AreaQuest\ChoBoGuide7\ItemEvent.txt] @EventItem_Area7
[@Luckystone_7Item]
#CALL [KINGSCRIPT\LuckStone.txt] @LuckyStone

[@BasicQuest_Control]
#CALL [AreaQuest\HumMainControl.txt] @RootControl

[@_War_Ready_Sabuk]
#CALL [System\SabukCastle\SabukDefaultSetting.txt] @CastleWarReady
[@_War_Start_Sabuk]
#CALL [System\SabukCastle\SabukDefaultSetting.txt] @CastleWarStart
[@_War_Finish_Sabuk]
#CALL [System\SabukCastle\SabukDefaultSetting.txt] @CastleWarFinish
[@_CastleOwnerChanged_Sabuk]
# CALL [System\SabukCastle\Sabukflag.txt] @ChangeFlag
[@_CastleFlagChanged_Sabuk]
#CALL [System\SabukCastle\Sabukflag.txt] @ChangeFlag

[@_War_Ready_Taosung]
#CALL [System\TaosungCastle\TaosungDefaultSetting.txt] @CastleWarReady_TAOSUNG
[@_War_Start_Taosung]
#CALL [System\TaosungCastle\TaosungDefaultSetting.txt] @CastleWarStart_TAOSUNG
[@ _War_Finish_Taosung]
#CALL [System\TaosungCastle\TaosungDefaultSetting.txt] @CastleWarFinish_TAOSUNG
[@_CastleOwnerChanged_Taosung]
#CALL [System\TaosungCastle\Taosungflag.txt] @ChangeFlag_TAOSUNG
[@_CastleFlagChanged_Taosung]
#CALL [System\TaosungCastle\Taosungflag.txt] @ChangeFlag_TAOSUNG

[@_UPLVLEVENT]
#CALL [KINGSCRIPT\UpLvlEvrnt.TXT] @UPLEVEL_EVENT

[@_USEROFFLINE]
#IF
checkcmd ISPKMODE
#ACT
goto @_USERDIE

[@_USERDIE]
#IF
checkcmd ISPKMODE
#ACT
loadvalue A0 "PlayerParam\PK tournament record.ini" [Users] [the applicant]
loadvalue A1 "PlayerParam\PK tournament record.ini" [Users] [meet the challenge of people]
savevalue "PlayerParam\PK tournament record.ini" [state] [state] 5
#ELSEACT
break

#IF
EQUAL A0% USERNAME
#ACT
linemsg [grobal] "<$OUTPUT(A1)> with <$USERNAME> PK win."
savevalue "PlayerParam\PK tournament record.ini" [Users] [loser]% A0
savevalue "PlayerParam\PK tournament record.ini" [Users] [winner]% A1
actcmd RUNSCRIPTLABEL% A1 "@_PK victory"
#ELSEACT
linemsg [grobal] "<$OUTPUT(A0)> with <$USERNAME> PK win."
savevalue "PlayerParam\PK tournament record.ini" [Users] [loser]% A1
savevalue "PlayerParam\PK tournament record.ini" [Users] [winner]% A0
actcmd RUNSCRIPTLABEL% A0 "@_PK victory"

[@_PK Victory]
#ACT
loadvalue D4 "PlayerParam\PK tournament record.ini" [amount] [Points Volume]
mov P1 2
mov P2% D4
mov P3 9
mov P4 10
mul P1 P2
mul P9 P3
div P9 P4
#IF
Large P9 0
#ACT
mov D0% P9
give integral volume% D0
linemsg [Grobal] "<$USERNAME> access to PK awards <$OUTPUT(D0)> Integral Volume"
linemsg "E007" "Please note, PK field will be shut down in 30 seconds"
cleardelaygoto 10033
delaygoto [grobal] 30 @PK victory _2
#ELSEACT
linemsg "E007" "Please note, PK field will be shut down in 30 seconds"
cleardelaygoto 10033
delaygoto [grobal] 30 @PK victory _2

[@PK victory _2]
#IF
#ACT
mapting E007 1 405 117
actcmd delfile "envir\PlayerParam\PK tournament record.ini"
SetAreaAttr "E007, 40,40,200" "SAFE"

[@_ONUSERHOURCHANGE]
#CALL [Vimascript\ma enamel tribe was a heaven-sent.Txt] @Ma enamel tribe was a heaven-sent content

[@_ONUSERDAYCHANGE]
# ACT
break

[@_ONUSERWEEKCHANGE]
#IF
!checkcmd ISTESTSERVER
#ACT
actcmd SETDOUBLEEXP = 50400000
sysmsg "double time to reset." 1
break

[@_ONREADBOOK]
#CALL [KINGSCRIPT\ONREADBOOK.txt] @ READBOOKMAIN

[@_ONWEEKCHANGE]
#CALL [KINGSCRIPT\WeekchangeEvent.txt] @ WeekchangeEvent1

[@_ONDAYCHANGE]
#CALL [KINGSCRIPT\DaychangeEvent.txt] @ DaychangeEvent1

[@_ONHOURCHANGE]
#CALL [KINGSCRIPT\HourchangeEvent.txt] @ HourchangeEvent1

[@_CHECKPASSEVENT]
#CALL [vimascript\on-line lock. Txt] @ lockequipevent


[@_UserLogin2]
#ACT
goto @CHECKUNSTUDEVENT
goto @NewCharEvent

[@CHECKUNSTUDEVENT]
#CALL [KINGSCRIPT\CHECKUNSTUDENT.TXT] @CHECKUNSTUDENT_LOGIN

[@NewCharEvent]
#CALL [KINGSCRIPT\NEWHUMAN.txt] @newhuman

[@_ONITEMDOWN]
#CALL [KINGSCRIPT\Itemlog.txt] @REDItemlog
;;Ҫɾ